home *** CD-ROM | disk | FTP | other *** search
/ Sprite 1984 - 1993 / Sprite 1984 - 1993.iso / src / cmds / gdb / foo / copying.awk < prev    next >
Encoding:
AWK Script  |  1989-07-05  |  1.3 KB  |  54 lines
  1. BEGIN    {
  2.       FS="\"";
  3.       print "/* Do not modify this file; it is created automatically";
  4.       print "   by copying.awk.  */";
  5.       print "extern int immediate_quit;";
  6.       print "static void";
  7.       print "copying_info ()";
  8.       print "{";
  9.       print "  immediate_quit++;";
  10.     }
  11. NR == 1,/^[     ]*NO WARRANTY[     ]*$/    {
  12.       if (! ($0 ~ /^[     ]*NO WARRANTY[     ]*$/)) 
  13.         {
  14.           printf "  printf_filtered (\"";
  15.           for (i = 1; i < NF; i++)
  16.         printf "%s\\\"", $i;
  17.           printf "%s\\n\");\n", $NF;
  18.         }
  19.     }
  20. /^[     ]*NO WARRANTY[     ]*$/    {
  21.       print "  immediate_quit--;";
  22.       print "}";
  23.       print "";
  24.       print "static void";
  25.       print "warranty_info ()";
  26.       print "{";
  27.       print "  immediate_quit++;";
  28.     }
  29. /^[     ]*NO WARRANTY[     ]*$/, /^[     ]*END OF TERMS AND CONDITIONS[     ]*$/{  
  30.       if (! ($0 ~ /^[     ]*END OF TERMS AND CONDITIONS[     ]*$/)) 
  31.         {
  32.           printf "  printf_filtered (\"";
  33.           for (i = 1; i < NF; i++)
  34.         printf "%s\\\"", $i;
  35.           printf "%s\\n\");\n", $NF;
  36.         }
  37.     }
  38. END    {
  39.       print "  immediate_quit--;";
  40.       print "}";
  41.       print "";
  42.       print "void"
  43.       print "_initialize_copying ()";
  44.       print "{";
  45.       print "  add_info (\"copying\", copying_info,";
  46.       print "        \"Conditions for redistributing copies of GDB.\");";
  47.       print "  add_info (\"warranty\", warranty_info,";
  48.       print "      \"Various kinds of warranty you do not have.\");";
  49.       print "}";
  50.     }
  51.  
  52.  
  53.         
  54.